home *** CD-ROM | disk | FTP | other *** search
/ Atari Forever 4 / Atari Forever 4.zip / Atari Forever 4.iso / PD_THEMA / CLI / SSL_CLI.1_4 / BAK_DEL.BAT < prev    next >
DOS Batch File  |  1998-03-14  |  2KB  |  58 lines

  1. @ECHO=OFF
  2. WRAP=OFF
  3. REM   Copyright 1991: Stephan Slabihoud
  4. CLS
  5. CLEAR
  6. ECHO  ##############################################################################
  7. ECHO  #                                                                            #
  8. ECHO  #=============> Batchdatei zum Löschen von beliebigen Dateien. <=============#
  9. ECHO  #                                                                            #
  10. ECHO  # Es werden alle Verzeichnisse ab [Pfad] auf [Laufwerk:] durchsucht.         #
  11. ECHO  #                                                                            #
  12. ECHO  # Aufruf: BAK_DEL.BAT [Laufwerk:][Pfad][Maske] <[Laufwerk:][Pfad][Maske]...> #
  13. ECHO  #                                                                            #
  14. ECHO  ##############################################################################
  15. ECHO
  16. WRAP=ON
  17. IF%1= "" kein_parameter
  18. :weiter
  19. ECHO  Bearbeite: %1
  20. STREE %1
  21. IFERR= 0 leerer_stack
  22. :loop
  23. ECHO  Soll %E gelöscht werden? (Ja/Ende/Alle/*)
  24. GETKEY
  25. IFERR= 74 lösche
  26. IFERR= 106 lösche
  27. IFERR= 69 ende2
  28. IFERR= 101 ende2
  29. IFERR= 65 alle
  30. IFERR= 97 alle
  31. POP
  32. IFERR= 0 ende
  33. GOTO loop
  34. :lösche
  35. DEL %E
  36. ECHO  %L ...gelöscht !!!
  37. GOTO loop
  38. :alle
  39. DEL %A
  40. GOTO ende
  41. :kein_parameter
  42. ECHO  Es wurde kein Parameter angegeben! Soll "\*.BAK" angenommen werden? (Ja/*)
  43. ECHO
  44. SET%1 "\*.BAK"
  45. GETKEY
  46. IFERR= 74 weiter
  47. IFERR= 106 weiter
  48. GOTO ende2
  49. :leerer_stack
  50. ECHO  Keine Datei gefunden!
  51. :ende
  52. SHIFT
  53. IFERR# 0 weiter
  54. :ende2
  55. ECHO
  56. END
  57.  
  58.